home *** CD-ROM | disk | FTP | other *** search
/ Technotools / Technotools (Chestnut CD-ROM)(1993).ISO / editors / multied / init.src < prev    next >
Encoding:
Text File  |  1988-03-08  |  10.0 KB  |  162 lines
  1. $MACRO Init;
  2.   UnAssign_All_Keys;
  3.  
  4. {Default settings}
  5.   MACRO_TO_KEY(<F1>       ,'MAINHELP'        ,Edit      ); {Main help screen         }
  6.   MACRO_TO_KEY(<F2>       ,'ME-MENUS'        ,Edit      ); {Main menu                }
  7.   MACRO_TO_KEY(<B0>       ,'ME-MENUS'        ,Edit      ); {Main menu                }
  8.   MACRO_TO_KEY(<F3>       ,'SAVEFILE'        ,Edit      ); {Save a file              }
  9.   MACRO_TO_KEY(<CtrlF3>   ,'SAVEBLCK'        ,Edit      ); {Save a block to a file   }
  10.   MACRO_TO_KEY(<ShftF3>   ,'LOADFILE'        ,Edit      ); {Load a file              }
  11.   MACRO_TO_KEY(<F6>       ,'SEARCH'          ,Edit      ); {Search                   }
  12.   MACRO_TO_KEY(<ShftF6>   ,'S_REPL'          ,Edit      ); {Search and replace       }
  13.   MACRO_TO_KEY(<F7>       ,'MARKBLCK'        ,Edit      ); {Mark a block             }
  14.   MACRO_TO_KEY(<ShftF7>   ,'MCOLBLCK'        ,Edit      ); {Mark a column block      }
  15.   MACRO_TO_KEY(<CtrlF9>   ,'BLOCKOFF'        ,Edit      ); {Turn block mark off      }
  16.   MACRO_TO_KEY(<AltF8>    ,'UNDBLK'          ,Edit      ); {Undent block             }
  17.   MACRO_TO_KEY(<AltU>     ,'UNDBLK'          ,Edit      ); {Undent block             }
  18.   MACRO_TO_KEY(<AltF7>    ,'INDBLK'          ,Edit      ); {Indent block             }
  19.   MACRO_TO_KEY(<AltI>     ,'INDBLK'          ,Edit      ); {Indent block             }
  20.   CMD_TO_KEY(  <F9>       ,COPY_BLOCK        ,Edit      ); {Copy the marked block    }
  21.   CMD_TO_KEY(  <F10>      ,MOVE_BLOCK        ,Edit      ); {Move the marked block    }
  22.   CMD_TO_KEY(  <CtrlF10>  ,DELETE_BLOCK      ,Edit      ); {Delete marked block      }
  23.   CMD_TO_KEY(  <ShftF9>   ,USER_WINDOW_COPY  ,Edit      ); {Interwindow block copy   }
  24.   CMD_TO_KEY(  <ShftF10>  ,USER_WINDOW_MOVE  ,Edit      ); {Interwindow block move   }
  25.   MACRO_TO_KEY(<F8>       ,'RUNMAC'          ,Edit      ); {Run a macro              }
  26.   MACRO_TO_KEY(<CtrlF8>   ,'COMPILE'         ,Edit      ); {Compile a program        }
  27.   MACRO_TO_KEY(<CtrlF2>   ,'CMPERROR'        ,Edit      ); {Find next compiler error }
  28.   MACRO_TO_KEY(<AltE>     ,'CMPERROR'        ,Edit      ); {Find next compiler error }
  29.   MACRO_TO_KEY(<AltF9>    ,'TEMPLATE'        ,Edit      ); {Expand template          }
  30.   MACRO_TO_KEY(<AltT>     ,'TEMPLATE'        ,Edit      ); {Expand template          }
  31.   MACRO_TO_KEY(<AltF6>    ,'MATCH'           ,Edit      ); {Match brace for language }
  32.   MACRO_TO_KEY(<AltM>     ,'MATCH'           ,Edit      ); {Match brace for language }
  33.   MACRO_TO_KEY(<ShftF1>   ,'NEXTWIN'         ,Edit      ); {Switch to next window    }
  34.   MACRO_TO_KEY(<CtrlF1>   ,'LASTWIN'         ,Edit      ); {Switch to last window    }
  35.   CMD_TO_KEY(  <CtrlF5>   ,ZOOM              ,Edit      ); {Zoom window to full size }
  36.   CMD_TO_KEY(  <DEL>      ,DEL_CHAR          ,Edit      ); {Delete character         }
  37.   MACRO_TO_KEY(<AltD>     ,'DELEOL'          ,Edit      ); {Delete to end of line    }
  38.   MACRO_TO_KEY(<ShftDEL>  ,'DELWORD'         ,Edit      ); {Delete word forward      }
  39.   CMD_TO_KEY(  <BS>       ,BACK_SPACE        ,Edit      ); {Back space               }
  40.   MACRO_TO_KEY(<CtrlBS>   ,'BSWORD'          ,Edit      ); {Back space a whole word  }
  41.   CMD_TO_KEY(  <ShftF8>   ,DEL_LINE          ,Edit      ); {Delete line              }
  42.   CMD_TO_KEY(  <TAB>      ,TAB_RIGHT         ,Edit      ); {Tab right                }
  43.   CMD_TO_KEY(  <ShftTAB>  ,TAB_LEFT          ,Edit      ); {Tab left                 }
  44.   CMD_TO_KEY(  <F4>       ,INDENT            ,Edit      ); {Indent                   }
  45.   CMD_TO_KEY(  <ShftF4>   ,UNDENT            ,Edit      ); {Undent                   }
  46.   CMD_TO_KEY(  <F5>       ,MARK_POS          ,Edit      ); {Mark cursor position     }
  47.   CMD_TO_KEY(  <ShftF5>   ,GOTO_MARK         ,Edit      ); {Goto marked cursor positi}
  48.   MACRO_TO_KEY(<AltF5>    ,'ASCII'           ,EDIT      ); {Ascii table              }
  49.   MACRO_TO_KEY(<AltA>     ,'ASCII'           ,EDIT      ); {Ascii table              }
  50.   MACRO_TO_KEY(<AltF4>    ,'CONDENSE'        ,Edit      ); {Enter condensed display  }
  51.   MACRO_TO_KEY(<ENTER>    ,'CR'              ,Edit      ); {Carriage return "Enter"  }
  52.   CMD_TO_KEY(  <LF>       ,LEFT              ,Edit      ); {Cursor left              }
  53.   CMD_TO_KEY(  <RT>       ,RIGHT             ,Edit      ); {Cursor right             }
  54.   CMD_TO_KEY(  <UP>       ,UP                ,Edit      ); {Cursor up                }
  55.   CMD_TO_KEY(  <DN>       ,DOWN              ,Edit      ); {Cursor down              }
  56.   CMD_TO_KEY(  <HOME>     ,HOME              ,Edit      ); {Cursor to home           }
  57.   CMD_TO_KEY(  <END>      ,EOL               ,Edit      ); {Cursor to end of line    }
  58.   CMD_TO_KEY(  <PgUp>     ,PAGE_UP           ,Edit      ); {Display page up          }
  59.   CMD_TO_KEY(  <PgDn>     ,PAGE_DOWN         ,Edit      ); {Display page down        }
  60.   CMD_TO_KEY(  <CtrlHome> ,TOF               ,Edit      ); {To top of the file       }
  61.   CMD_TO_KEY(  <CtrlEnd>  ,EOF               ,Edit      ); {To Bottom of the file    }
  62.   CMD_TO_KEY(  <CtrlPgDn> ,NEXT_PAGE_BREAK   ,Edit      ); {Cursor to next page break}
  63.   CMD_TO_KEY(  <CtrlPgUp> ,LAST_PAGE_BREAK   ,Edit      ); {Cursor to last page break}
  64.   CMD_TO_KEY(  <CtrlLF>   ,WORD_LEFT         ,Edit      ); {Cursor word left         }
  65.   CMD_TO_KEY(  <CtrlRT>   ,WORD_RIGHT        ,Edit      ); {Cursor word right        }
  66.   MACRO_TO_KEY(<CtrlT>    ,'TOPWIN'          ,Edit      ); {Top of window            }
  67.   MACRO_TO_KEY(<CtrlB>    ,'BOTWIN'          ,Edit      ); {Bottom of window         }
  68.   MACRO_TO_KEY(<CtrlU>    ,'SCROLLUP'        ,Edit      ); {Scroll window up         }
  69.   MACRO_TO_KEY(<CtrlD>    ,'SCROLLDN'        ,Edit      ); {Scroll window down       }
  70.   MACRO_TO_KEY(<CtrlF6>   ,'GOTOLINE'        ,Edit      ); {Move cursor to line num  }
  71.   CMD_TO_KEY(  <AltF1>    ,ENTER_DOS_SHELL   ,Edit      ); {Enter the DOS shell      }
  72.   MACRO_TO_KEY(<AltF3>    ,'SHELLDOS'        ,Edit      ); {Run DOS from editor      }
  73.   CMD_TO_KEY(  <CtrlF7>   ,UNDO              ,Edit      ); {Undo                     }
  74.   CMD_TO_KEY(  <CtrlENTER>,UNDO              ,Edit      ); {Undo                     }
  75.   CMD_TO_KEY(  <AltF2>    ,CALCULATOR        ,Edit      ); {Pop up calculator        }
  76.   MACRO_TO_KEY(<CtrlF4>   ,'REFORMAT'        ,EDIT      ); {Reformat paragraph       }
  77.   MACRO_TO_KEY(<AltR>     ,'REFORMAT'        ,EDIT      ); {Reformat paragraph       }
  78.   CMD_TO_KEY(  <AltF10>   ,KEY_RECORD        ,Edit      ); {Key record (EDIT)        }
  79.   CMD_TO_KEY(  <AltF10>   ,KEY_RECORD        ,DOS_SHELL ); {Key record (DOS_SHELL)   }
  80.   MACRO_TO_KEY(<AltC>     ,'FCMD'            ,Edit      ); {Format codes             }
  81.   MACRO_TO_KEY(<F9>       ,'DOSLOAD'         ,DOS_SHELL ); {Load file from DOS_SHELL }
  82.   MACRO_TO_KEY(<AltJ>     ,'JUSTIFY'         ,EDIT      ); {Right Justify a paragraph}
  83.   MACRO_TO_KEY(<ShftF2>   ,'DATETIME'        ,Edit      ); {Date and time stamp      }
  84.   MACRO_TO_KEY(<AltL>     ,'LINEDRAW'        ,Edit      ); {Line drawing             }
  85.  
  86.   Set_Global_Int('Default_Insert_Mode',1);
  87.   Insert_Mode := Global_Int('Default_Insert_Mode');
  88.   Explosions := 1;
  89.   Mouse := 0;
  90.   Backups := 1;
  91.   Page_Str := ' ';
  92.   Truncate_Spaces := 1;
  93.   AutoSave := 0;
  94.   Set_Global_Str('PRINTER_TYPE', 'IBM');
  95.   Set_Global_Str('PRINTER_TYPES', 'IBM(PR)Okidata(PR)C.itoh(PR)Epson(PR)Toshiba(PR)NEC(PR)');
  96.   Set_Global_Int('RESTORE',0);
  97.   Set_Global_Int('BIG_COMPILE',0);
  98.  
  99.  
  100.   FLABEL('DatTim',12,Edit      );
  101.   FLABEL('LOAD  ',9,DOS_SHELL );
  102.   FLABEL('Record',40,DOS_SHELL );
  103.   FLABEL('Record',40,Edit      );
  104.   FLABEL('Refrmt',24,EDIT      );
  105.   FLABEL('Calc  ',32,Edit      );
  106.   FLABEL('UNDO  ',27,Edit      );
  107.   FLABEL('runDOS',33,Edit      );
  108.   FLABEL('DOSshl',31,Edit      );
  109.   FLABEL('GotoLn',26,Edit      );
  110.   FLABEL('Condns',34,Edit      );
  111.   FLABEL('ASCII ',35,EDIT      );
  112.   FLABEL('Goto  ',15,Edit      );
  113.   FLABEL('Mark  ',5,Edit      );
  114.   FLABEL('Undent',14,Edit      );
  115.   FLABEL('Indent',4,Edit      );
  116.   FLABEL('DelLin',18,Edit      );
  117.   FLABEL('Zoom  ',25,Edit      );
  118.   FLABEL('LstWin',21,Edit      );
  119.   FLABEL('NxtWin',11,Edit      );
  120.   FLABEL('Match ',36,Edit      );
  121.   FLABEL('Templt',39,Edit      );
  122.   FLABEL('ERROR',22,Edit      );
  123.   FLABEL('Compil',28,Edit      );
  124.   FLABEL('RunMac',8,Edit      );
  125.   FLABEL('WnMove',20,Edit      );
  126.   FLABEL('WnCopy',19,Edit      );
  127.   FLABEL('DelBl ',30,Edit      );
  128.   FLABEL('MoveBl',10,Edit      );
  129.   FLABEL('CopyBl',9,Edit      );
  130.   FLABEL('IndBlk',37,Edit      );
  131.   FLABEL('UndBlk',38,Edit      );
  132.   FLABEL('BlkOff',29,Edit      );
  133.   FLABEL('BegCol',17,Edit      );
  134.   FLABEL('MarkBl',7,Edit      );
  135.   FLABEL('S/Repl',16,Edit      );
  136.   FLABEL('Search',6,Edit      );
  137.   FLABEL('Load  ',13,Edit      );
  138.   FLABEL('SaveBl',23,Edit      );
  139.   FLABEL('Save  ',3,Edit      );
  140.   FLABEL('Menu  ',2,Edit      );
  141.   FLABEL('Help  ',1,Edit      );
  142.  
  143. {Filename extension specific}
  144.   Set_Global_Str('Extensions','.C .PAS .BAS .ASM .DOC .SRC .H .MOD .PRG');
  145.   Set_Global_Str('Compiler1','NONE(IN)MICROSOFT(IN)TURBO PASCAL 4.0(IN)TURBO C 1.0(IN) LATTICE C 3.0(IN) MULTI-EDIT (IN) CUSTOM(IN)');
  146.   Set_Global_Str('Compiler2','MS PASCAL 3.3');
  147.   Set_Global_Str('Compiler3','');
  148.   Set_Global_Str('Language1','NONE(IN)C(IN)PASCAL(IN)ASM(IN)BASIC(IN)MULTI-EDIT(IN)CUSTOM(IN)');
  149.   Set_Global_Str('.C','LS=C(IN) COMP=TURBO C 1.0(IN) IND=S TS=2(IN) RM=128(IN)');
  150.   Set_Global_Str('.C_Comp','MAKE <FILE>');
  151.   Set_Global_Str('.PAS','LS=PASCAL(IN) COMP=TURBO PASCAL 4.0(IN) IND=S TS=2(IN)  RM=128(IN)');
  152.   Set_Global_Str('.BAS','IND=O(IN) LS=BASIC(IN) COMP=MICROSOFT(IN)');
  153.   Set_Global_Str('.ASM','COMP=MICROSOFT(IN) RM=132(IN) TS=8(IN) IND=A(IN)');
  154.   Set_Global_Str('.DOC','IND=O(IN) WW=1(IN) RM=72(IN) DOC=1(IN)');
  155.   Set_Global_Str('.SRC','TS=2(IN) RM=128(IN) LS=MULTI-EDIT(IN) COMP=MULTI-EDIT (IN) IND=S(IN)');
  156.   Set_Global_Str('.SRC_Comp','MEMAC -P<ME_PATH> <FILE>');
  157.   Set_Global_Str('.H',' IND=S(IN) TS=2(IN) RM=128(IN) LS=C(IN) COMP=MICROSOFT(IN)');
  158.   Set_Global_Str('.MOD','LS=PASCAL(IN) COMP=TURBO PASCAL 4.0(IN) IND=S TS=2(IN) RM=128(IN)');
  159.   Set_Global_Str('.PRG','IND=A(IN) TS=4(IN)');
  160.  
  161. END_MACRO;
  162.